home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World Interactive 1995 August / Personal Computer World (PCW Interactive) (August 1995).iso / demos / bio / bioforge / script / ai_mrn3.scp < prev    next >
Text File  |  1995-02-22  |  5KB  |  299 lines
  1. { TMRN3A
  2. I ^ç╖ = $üé THEN
  3. é 
  4. I ^ìò = $üé THEN
  5. é 
  6. I ^ìû = $üâ THEN
  7. é 
  8. I @Ç¢ MARINE3A = $üé THEN
  9. {
  10. ! "CAN'T FIND Marine3A !!" 
  11. é 
  12. }
  13. Y BCHA BCH9
  14. ┬ 
  15. ^ìû = $üâ 
  16. A OFF
  17. ^îé = @Ç║ `êë $üè "MARINE: Unit 12 reporting... ~I've got a bead on our primary target./FUnité 12 en ligne : J'ai une~perle sur notre cible primaire./GHier Nummer 12.~Ich habe unser Primärziel im Visier."
  18. G FMRN3A RUN 60
  19. ┴ 
  20. @Ç¥ PAUSE_FOR_SUBTITLE
  21. ^îé = @Ç║ `êè $üè "He's hard to track~in that reflective gear./FDifficile à suivre~avec cette combinaison réflectrice./GIn dem Reflektionsanzug~ist er schwer zu verfolgen."
  22.  
  23. @Çì MRN3A_WAIT
  24. :LOOP
  25. ┴ 
  26. M ATK_SHOOT
  27. I ^ìù = 0 THEN
  28. J #Çü 
  29. @Çì XYZPDQ
  30. G PMRN3A RUN 60
  31. K 
  32. @ÇÜ BLASTERM3A 
  33. ┤ 
  34. ^ìò = $üé 
  35. }
  36. { XYZPDQ
  37.  
  38. @Ç¥ PAUSE_FOR_SUBTITLE
  39. @Ç║ `êî $üè "MARINE: Watch it boys, our friend~seems impervious to energy weapons./FAttention les gars, notre ami~a l'air insensible aux armes énergétiques./GAchtung, Jungs, unser Freund scheint gegen~Energiewaffen geschützt zu sein."
  40. }
  41. { TMRN3AX
  42. ^ìù = 1
  43. }
  44. { MRN3A_WAIT
  45. W 8 SECONDS
  46. ^ìù = 1
  47. }
  48. { READY_MARINE3A
  49. I ^ç╖ = $üé THEN
  50. é 
  51. I ^ìò = $üé THEN
  52. é 
  53. I @Ç¢ MARINE3A = $üé THEN
  54. {
  55. ! "CAN'T FIND Marine3A !!" 
  56.  
  57. é 
  58. }
  59. Z CURFIG ON
  60. r CURFIG OFF
  61. è ON
  62. A OFF
  63. ï PLAYER
  64. Y BCH9
  65. I @Çæ RTHAND BLASTERM3A = $üé THEN
  66. {
  67. I @ÇÜ BLASTERM3A THEN
  68. f RTHAND
  69. E 
  70. ! "Can't find blaster3A" 
  71. }
  72. ö MARINE3A
  73. G PMRN3A
  74. £ FMRN3A
  75. }
  76. { MARINE3A_AI
  77. ! "STUB TO ELIMINATE REPORTED ERROR: NEVER CALLED" 
  78. }
  79.  
  80.  
  81.  
  82.  
  83. { FALLACID_MARINE3B
  84. @Ç¢ MARINE3B 
  85. A OFF
  86.  @Ç║ `ë₧ $üè "MARINE: Aaahhh...!/FAaahhh... !/GAaahhh...!" 
  87. @Çå `Ç¢ -1024 200 
  88. ^ìÿ = $üé 
  89. K 
  90. }
  91. { READY_MARINE3B 
  92. I ^ç╖ = $üé THEN
  93. é 
  94. I ^ìÿ = $üé THEN
  95. é 
  96. ^ìÜ = 0
  97. ^ìÖ = $üé 
  98. I @Ç¢ MARINE3B = $üé THEN
  99. {
  100. ! "CAN'T FIND Marine3B !!" 
  101. é 
  102. }
  103. r CURFIG OFF
  104. è ON
  105. ï PLAYER
  106. Y PAD3 PAD4
  107. I @Çæ RTHAND BLASTERM3B = $üé THEN
  108. {
  109. I @ÇÜ BLASTERM3B THEN
  110. f RTHAND
  111. E 
  112. ! "Can't find blasterM3B" 
  113. }
  114. ö MARINE3B
  115. G PMRN3B
  116. Z CURFIG ON
  117. £ FROM_BCH
  118. @Çì ACTIVATE_MARINE3B
  119. }
  120. { ACTIVATE_MARINE3B
  121. I ^ç╖ = $üé THEN
  122. é 
  123. I ^ìÿ = $üé THEN
  124. é 
  125. I @Ç¢ MARINE3B = $üé THEN
  126. {
  127. ! "CAN'T FIND Marine3B !!" 
  128. é 
  129. }
  130. â 
  131. â 
  132. I @ÇÄ PAD4 THEN
  133. {
  134. ^îà = @Ç║ `êï $üè "MARINE: Couldn't stay away, could you?/FTu ne pouvais pas rester à l'écart, hein ?/GDu konntest wohl~nicht wegbleiben, was?"
  135. ^îå = @Çÿ `êï 
  136. }
  137. ┬ 
  138.  
  139.  
  140. :STILL_IN_STASIS
  141. I @Ç╛ == 0 THEN
  142. {
  143. A ON
  144. J #Çè 
  145. }
  146. M ATK_STAND
  147. ^ìÖ = $üâ 
  148. }
  149. { MARINE3B_AI
  150. P ~ÇÇ 
  151. ^îê = 0 
  152. ^îç = 0
  153. :TOP
  154. â 
  155.  
  156. I .ÇéÇâ != $üö THEN
  157. J #Çî
  158. ~ÇÇ = @Ç¥ MONSTER_MOVE 15
  159. I ~ÇÇ > 0 THEN
  160. {
  161. N ~ÇÇ 
  162. {
  163. U 1
  164. I @Çô "atk_m1" != $üâ THEN
  165. M ATK_M1 CONTINUE
  166. X ÇÇ 
  167. U 2
  168. I @Çô "atk_m2" != $üâ THEN
  169. M ATK_M2 CONTINUE
  170. X ÇÇ 
  171. U 3
  172. I @Çô "atk_m3" != $üâ THEN
  173. M ATK_M3 CONTINUE
  174. X ÇÇ 
  175. U 4
  176. U 6
  177. ┴ 
  178. X ÇÇ 
  179. U 7
  180. I @Çô "atk_m7" != $üâ THEN
  181. M ATK_M7 CONTINUE
  182. X ÇÇ 
  183. U 8
  184. I @Çô "atk_m8" != $üâ THEN
  185. M ATK_M8 CONTINUE
  186. X ÇÇ 
  187. U 9
  188. I @Çô "atk_m9" != $üâ THEN
  189. M ATK_M9 CONTINUE
  190. X ÇÇ 
  191. U 10
  192. I @Çô "run" != $üâ THEN
  193. M RUN CONTINUE
  194. X ÇÇ 
  195. }
  196. }
  197. E 
  198. {
  199.  @Çì LUTHOR_ATTACK
  200. }
  201. J #Çî
  202. }
  203. { MARINE3B_STIMULUS _DAMAGE 
  204. :GOT_HIT
  205. I @Çó ^îé == $üâ THEN
  206.  ^îü 
  207. é 
  208. :SUPER_RECOIL
  209. ^îç ++
  210. I ^îç = 1 THEN
  211. {
  212.  
  213. ^îà = @Ç║ `ç╝ $üë "You're the ones who started this fight...~now I'll finish it!/FC'est vous qui avez commencé~ce combat, maintenant c'est moi~qui vais y mettre fin./GIhr habt mit dem Kampf angefangen,~ich werde ihn beenden."
  214. ^îå = @Çÿ `ç╝ 
  215. }
  216. I ^îç = 3 THEN
  217. {
  218.  
  219. ^îà = @Ç║ `ù░ $üë "You people have worse problems to~worry about in this place than me!/FVous avez des choses beaucoup~plus importantes à faire que~de vous occuper de moi !/GIhr habt hier größere Probleme~als mich!"
  220. ^îå = @Çÿ `ù░ 
  221. }
  222. I ^îç = 5 THEN
  223. ^îç = 0
  224. é 
  225. :PLAYER_SUPER_RECOILED
  226. ^îê ++
  227. A OFF
  228. I ^îê = 1 THEN
  229. {
  230. M C_TAUNT1 CONTINUE
  231.  
  232. ^îé = @Ç║ `êì $üè "MARINE: I'm going to do some custom~body work on you./FJe vais te ravaler la carrosserie !/GIch werde dir~die Karosserie umbauen!"
  233. ^îü = @Çÿ `êì 
  234. }
  235. I ^îê = 3 THEN
  236. {
  237. M C_TAUNT2 CONTINUE
  238.  
  239. ^îé = @Ç║ `êÄ $üè "MARINE: Come on! Get up!~I got a little present for you.../FAllons ! Debout !~J'ai un petit cadeau pour toi.../GKomm schon! Steh auf!~Ich hab' ein Geschenk für dich..."
  240. ^îü = @Çÿ `êÄ 
  241. }
  242. I ^îê = 5 THEN
  243. ^îê = 0
  244. @Ç¥ PAUSE_FOR_SUBTITLE
  245. M ATK_STAND CONTINUE
  246. A ON
  247. é 
  248. :KILLED_PLAYER
  249. I ^ìÿ = $üé THEN
  250. é 
  251. A OFF
  252. M ATK_M2 CONTINUE
  253. W 20
  254. ┴ 
  255. M ATK_STAND CONTINUE
  256. W 1 SECONDS
  257. M TAUNT1 CONTINUE
  258.  
  259. ^îé = @Ç║ `êÅ $üè "MARINE: Be sure to tell~the devil who sent you./FN'oublie pas de dire au diable~qui t'envoie./GErzähl dem Teufel,~wer dich geschickt hat."
  260. @Ç¥ PAUSE_FOR_SUBTITLE
  261. â 
  262. M STAND CONTINUE
  263. }
  264. { MARINE3B_DEATH
  265. @Ç¢ PLAYER 
  266. A OFF
  267. M ATK_STAND CONTINUE
  268. @Ç¢ MARINE3B 
  269. A OFF
  270. u CURFIG OFF
  271. ║ ON
  272. M DIE
  273. o 
  274. ^ìÿ = $üé 
  275.  
  276. I @Çæ RTHAND BLASTERM3B THEN
  277. {
  278. @ÇÜ RTHAND 
  279. f GROUND
  280. }
  281. E 
  282. ! "I've lost me BlasterM3B device!" 
  283. @Ç¢ PLAYER 
  284. è OFF
  285. £ LANBOT_4 GRADUAL
  286. W 1 SECONDS
  287. M TAUNT2 CONTINUE
  288. @Çì GROWL 10
  289.  
  290.  @Ç║ `ç╜ $üë "Is that the best you got Mastaba?!~Bring 'em on!/FC'est ce que tu as de mieux,~Mastaba ?! Amène-les !/GHast du nichts Besseres, Mastaba?~Her damit!"
  291. M TAUNT3 CONTINUE
  292.  @Ç║ `ç╛ $üë "I'm coming for YOU Mastaba. I swear it!~I'M COMING FOR YOU!/FC'est pour TOI que je viens, Mastaba.~Je le jure! C'EST POUR TOI QUE JE VIENS !/GIch kriege dich, Mastaba.~Ich schwöre es! ICH KRIEGE DICH!"
  293. A ON
  294. C UNLOCK
  295. }
  296.  
  297.  
  298. //$ 26 - version number
  299.